home *** CD-ROM | disk | FTP | other *** search
/ IRIX 6.2 Development Libraries / SGI IRIX 6.2 Development Libraries.iso / dist / complib.idb / usr / share / catman / p_man / cat3 / complib / slangb.z / slangb
Text File  |  1996-03-14  |  3KB  |  133 lines
  1.  
  2.  
  3.  
  4. SSSSLLLLAAAANNNNGGGGBBBB((((3333FFFF))))                                                          SSSSLLLLAAAANNNNGGGGBBBB((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      SLANGB - return the value of the one norm, or the Frobenius norm, or the
  10.      infinity norm, or the element of largest absolute value of an n by n band
  11.      matrix A, with kl sub-diagonals and ku super-diagonals
  12.  
  13. SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  14.      REAL FUNCTION SLANGB( NORM, N, KL, KU, AB, LDAB, WORK )
  15.  
  16.          CHARACTER NORM
  17.  
  18.          INTEGER   KL, KU, LDAB, N
  19.  
  20.          REAL      AB( LDAB, * ), WORK( * )
  21.  
  22. PPPPUUUURRRRPPPPOOOOSSSSEEEE
  23.      SLANGB  returns the value of the one norm,  or the Frobenius norm, or the
  24.      infinity norm,  or the element of  largest absolute value  of an n by n
  25.      band matrix  A,  with kl sub-diagonals and ku super-diagonals.
  26.  
  27.  
  28. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  29.      SLANGB returns the value
  30.  
  31.         SLANGB = ( max(abs(A(i,j))), NORM = 'M' or 'm'
  32.                  (
  33.                  ( norm1(A),         NORM = '1', 'O' or 'o'
  34.                  (
  35.                  ( normI(A),         NORM = 'I' or 'i'
  36.                  (
  37.                  ( normF(A),         NORM = 'F', 'f', 'E' or 'e'
  38.  
  39.      where  norm1  denotes the  one norm of a matrix (maximum column sum),
  40.      normI  denotes the  infinity norm  of a matrix  (maximum row sum) and
  41.      normF  denotes the  Frobenius norm of a matrix (square root of sum of
  42.      squares).  Note that  max(abs(A(i,j)))  is not a  matrix norm.
  43.  
  44.  
  45. AAAARRRRGGGGUUUUMMMMEEEENNNNTTTTSSSS
  46.      NORM    (input) CHARACTER*1
  47.              Specifies the value to be returned in SLANGB as described above.
  48.  
  49.      N       (input) INTEGER
  50.              The order of the matrix A.  N >= 0.  When N = 0, SLANGB is set to
  51.              zero.
  52.  
  53.      KL      (input) INTEGER
  54.              The number of sub-diagonals of the matrix A.  KL >= 0.
  55.  
  56.      KU      (input) INTEGER
  57.              The number of super-diagonals of the matrix A.  KU >= 0.
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. SSSSLLLLAAAANNNNGGGGBBBB((((3333FFFF))))                                                          SSSSLLLLAAAANNNNGGGGBBBB((((3333FFFF))))
  71.  
  72.  
  73.  
  74.      AB      (input) REAL array, dimension (LDAB,N)
  75.              The band matrix A, stored in rows 1 to KL+KU+1.  The j-th column
  76.              of A is stored in the j-th column of the array AB as follows:
  77.              AB(ku+1+i-j,j) = A(i,j) for max(1,j-ku)<=i<=min(n,j+kl).
  78.  
  79.      LDAB    (input) INTEGER
  80.              The leading dimension of the array AB.  LDAB >= KL+KU+1.
  81.  
  82.      WORK    (workspace) REAL array, dimension (LWORK),
  83.              where LWORK >= N when NORM = 'I'; otherwise, WORK is not
  84.              referenced.
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.                                                                         PPPPaaaaggggeeee 2222
  130.  
  131.  
  132.  
  133.